home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / LOGO / 3530.ZIP / LADYBUG.ZIP / SOCCER.BUG < prev    next >
Encoding:
Text File  |  1989-12-31  |  256 b   |  22 lines
  1. to "poly  :d :a
  2. forward :d
  3. right :a
  4. poly :d :a
  5. end
  6.  
  7. to "soccer  
  8. REPEAT 6 [FD 50 RT 60]
  9. FD 60 LT 60
  10. end
  11.  
  12. to "hex  :DIS
  13. REPEAT 6 [FD :DIS RT 60]
  14. FD :DIS LT 60
  15. end
  16.  
  17. to "pent  :DIS
  18. REPEAT 6 [FD :DIS RT 60]
  19. FD :DIS LT 72
  20. end
  21.  
  22. to "hex  :DI